home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
System Booster
/
System Booster.iso
/
SYS
/
s
/
DLPrint.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1996-09-26
|
327b
|
19 lines
/* Automate printing labels for each disk inserted into drive DF0: */
address REXX
options results
address MEGAD
dbug
do forever
diskin
if result == "ABORT" then leave
"mark df0:"
selectall
NextItem Name /* will test for at lease one item on the disk to print label for */
if result ~= "" then label
freeVolumes
end